Top 10k strings from Video Basic - Issue 17 (1985)(Ingelek Jackson)(16k)(es).tzx in <root> / bin / z80 / software / Sinclair Spectrum Collection TOSEC.exe / Sinclair ZX Spectrum - Magazines / Sinclair ZX Spectrum - Magazines - [TZX] (TOSEC-v2007-01-01) /
Back to the directory listing
5 *
3 t$(2)-48":
3 A$="PON EN MARCHA LA GRABADORA":
3 "4";"ESTA BIEN ESCRITO ? (S/N)";
3 "23606",z:
3 "10",z;" PARA LA GRABADORA ":
3
2 t$=" PULSA UNA TECLA PARA CONTINUAR "
2 t$(3)-48":
2 rf`VfVVQ`QQVfVV
2 p$=q$(qf+1
2 p$="VIDEOHARDWARE: ":
2 p$="VIDEOBASIC-LA PROGRAMACION: ":
2 a=(i$(u)="
2 Via Indipendenza 88
2 U;" ";N$;" "
2 SIGUIENTE"
2 LETREROS ENTRANTES
2 LEE LOS UDG
2 HOMBRECILLO
2 ;"VIDEOBASIC":
2 ;"BEPATRSCIN":
2 ;" ""5""
2 ;" "
2 ;" ":
2 2rs2LM2LM2
2 2fg2VW2@A2
2 ,XX;" ";
2 "9",N;" ~|";
2 "8",N;A$(N-2
2 "3";"ESCRIBE TU NOMBRE EN EL TECLADO Y PULSA <ENTER>":
2 "23617",Z:
2 "23296"+N,
2 "10",N;" \]"
2 "(21.5-a)*8":
2 "(21-YP)*8-2":
2 SOFTIDEA (Como)
2 PASO A LA PARTE";
2 * * * *
2 Tel.031-240.959
2 PARA LA GRABADORA
2
1 |x@@@@@@@@@DHp`@@DHpdHp`
1 z;" ":
1 y(n)=y(n+1
1 y$=" PULSA UNA TECLA PARA CONTINUAR ":
1 u;"EXACTO !":
1 u;"D:DURACION A$:TECLA PULSADA"
1 u;"BASIC"(I)
1 u;" VALOR NO ADMISIBLE",:
1 u,z;"EJ. FLASH 0/PAPER 4/BRIGHT 1...";
1 t$=" ":
1 t$(u+u)-48":
1 t$(u)="<":
1 t$(u)="1292"(B)
1 t$(4)-49":
1 t$(3)-49":
1 t$(3)-48)*4+2":
1 t$(3)-48",
1 t$(2)-48)*8+2":
1 t$(2)-48";
1 sound up
1 rf`VfVVQ`QQVVVV
1 q$(qf)=q$(c)
1 para la grabadora":
1 p=(b-top)*2
1 p;" ":
1 p;" ":
1 p$=q$(qf):
1 p$="los temas de la leccion ":
1 p$="en Lenguaje Maquina ":
1 p$="ZOO ":
1 p$="VIDEOTEST: ":
1 p$="VIDEONEXT: ":
1 p$="VIDEOJUEGO: ":
1 p$="VIDEOJUEGO: ":
1 p$="VIDEOBREAK: ":
1 p$="VIDEOBREAK ":
1 p$="VIDEOBASIC-EL LENGUAJE: ":
1 p$="TU primer programa ":
1 p$="TONADA ":
1 p$="SIMULADOR DE VUELO ":
1 p$="MUSICA con el SPECTRUM ":
1 p$="Lenguaje Maquina #1 ":
1 p$="Juego de adivinanzas sobre ":
1 p$="En el proximo numero... ":
1 p$="El circuito sonoro ":
1 p$="Dentro del microprocesador ":
1 p$="BEEP * ATTR * SCREEN$ ":
1 p$="Assembler ":
1 p$="Anatomia del Z80 ":
1 oct=oct-12
1 oct=oct+12
1 n;" ":
1 last=(a-top)*2
1 l,p;m$(dur1,cnt,
1 l$="LA PRODUCCION DEL SONIDO COM-PETE AL MICROPROCESADOR: PORESTA RAZON, DURANTE LA EMISIONSONORA SE INTERRUMPE EL CICLODE INTERRUPT QUE LEE EL TECLA-DO Y PONE AL DIA LAS VARIABLESDEL SISTEMA."
1 j,p1;" "
1 j,lastd;" ";
1 i,last;" ";
1 i,(a-top)*2
1 f$(2,a)";",";note,,
1 drive impres.":
1 copy=23760
1 b$=b$+(w$(j)
1 b$=" ":
1 attr=23813
1 a=a+(i$(i)="."):
1 a;" ":
1 a$="LA PROGRAMACION":
1 a$=" ":
1 ZOO
1 Z,Z;"INDICA UN ATRIBUTO ";
1 Z,Z;"D=";i$
1 Z,Z;"BIEN, "+N$,,,,"AHORA PULSA <RUN> Y A TOCAR...",,:
1 YY,XX;" ";
1 Y,N;A$(N-2
1 Y,N;" {|";
1 Y$="PULSA UNA TECLA PARA CONTINUAR ":
1 Y$="*PULSA UNA TECLA PARA CONTINUAR *"
1 Y$=" PULSA UNA TECLA PARA CONTINUAR "
1 X<21)+(30-X)*(X>20)"):
1 X,Y;T$(N):
1 VISUALIZACION DEL BLOQUE
1 VIDEOTEST
1 VIDEONEXT
1 VIDEOLIST t
1 VIDEOHARD
1 VIDEOBASIC N.17
1 UUUUUUUUUUUUUUUUUUUUUUUUUUUUUUUU
1 UN MOMENTO...":
1 UDG p
1 U;"OTRA VEZ..":
1 U;"OTRA VEZ !":
1 U;"ESTA ES LA INSTRUCCION EXACTA:":
1 U;"ERROR !":
1 U;"""F"" PARA TERMINAR":
1 U;" ATRIBUTO NO VALIDO-OTRA VEZ",:
1 U,Z;"(TAMBIEN VALIDA CON DECIMALES)";
1 U+U,XP;A$;
1 TABLA TEST
1 TABLA LENG
1 T$="QUIZAS SEA MEJOR QUE REVISESCON CALMA EL DESARROLLO DELPROGRAMA Y LO VUELVAS A IN-TENTAR PONIENDO MUCHA ATENCI-ON.":
1 T$="ESCRIBE LAS INSTRUCCIONES SE-GUN LO QUE TE VAYA PIDIENDO.ESTOY SEGURO DE QUE NO ENCON-TRARAS GRANDES DIFICULTADES!":
1 T$="ELIGE, "+N$:
1 T$="AHORA, "+N$:
1 T$="(PULSA <F> PARA TERMINAR Y <D> PARA ESTABLECER LA DURACION)":
1 T$=" ELIGE, :":
1 T$=" ELIGE, "+n$+":":
1 SOFTIDEA (Como)
1 SE PUEDE TOMAR EL SONIDO DE LASALIDA "EAR" ? SI
1 SCROLL=23828
1 S$=" "
1 RUTINA MAQUINA DE ESCRIBIR
1 ROTULOS ROTATORIOS
1 REGISTRO DEL NOMBRE
1 QUE PARAMETRO DISTINGUE DOSNOTAS ENTRE SI ? FRECUENCIA
1 PfgPVW2VW2
1 PROGRAMA `
1 PORTADA T
1 PIENSAS SIEMPRE ASI DE LENTO!!!! DATE PRISA "
1 PANTALLA
1 P=P-(P>M):
1 P$="VIDEONEXT":
1 P$="VIDEOLIST":
1 P$="VIDEOBASIC-EL LENGUAJE: ":
1 P$=" en el numero 18 ":
1 O,i;A$(i-2
1 N$=N$+" ":
1 N$(A-23296
1 MUSIC U
1 M-15349-1985
1 LETREROS ROTATORIOS
1 LENGUAJE 1
1 LAS FUNCIONES <SCREEN$> Y<ATTR> SIRVEN PARA OBTENER IN-FORMACIONES RELACIONADAS CONEL CONTENIDO DE LA PANTALLA.%%EN CONCRETO& &SCREEN$ (fila,columna)& &DEVUELVE EL CARACTER QUE EN LAPANTALLA OCUPA LA LOCALIZACIONINDICADA POR LAS COORDENADAS(fila, columna).% %EL DIRECCIONAMIENTO ES IDENTI-CO AL DE LA COMPLEMENTARIA<PRINT AT...>, POR LO QUE& &PRINT AT 5,9;"A" LET B$=SCREEN$ (5,9)& &ESTABLECE LA VARIABLE <B$> CONEL CARACTER <A>.% %EL ARGUMENTO DE <SCREEN$> DEBEESTAR SIEMPRE ENCERRADO ENTREPARENTESIS. SI LA LOCALIZACIONINDICADA NO CONTIENE CARACTE-RES VALIDOS (PORQUE POR EJEM-PLO HAYAN SIDO ALTERADOS POR<OVER> O POR INSTRUCCIONESGRAFICAS) SE DEVUELVE UNA CA-DENA VACIA.# #<ATTR> SIRVE EN CAMBIO PARACONOCER LOS ATRIBUTOS QUE CA-RACTERIZAN UNA DETERMINADA PO-SICION DE LA PANTALLA.% %YA QUE LAS CARACTERISTICAS DECADA POSICION DE IMPRESION ES-TAN INTEGRAMENTE CONTENIDAS ENUN SOLO BYTE, EL VALOR DEVUEL-TO
1 LA ONDA QUE MANEJA EL ALTAVOZES DE TIPO LOGICO ? SI
1 LA DURACION (EN SEGUNDOS), SEPODRA ESTABLECER AL PRINCIPIO,PULSANDO LA TECLA <D>.",""
1 L$="QUIERES REPASAR LO QUE HEMOSVISTO (S/N) ?":
1 L$="LA SENAL PILOTO DEL ALTAVOZ ESDE TIPO LOGICO: ESTA CONSTI-TUIDA POR UNA SECUENCIA DE DOSNIVELES DE TENSION; LA VELOCI-DAD CON LA QUE ESTOS SE SUCE-DAN DA LUGAR A LA FRECUENCIADEL SONIDO."
1 L$="EXISTEN OTROS METODOS PARAPRODUCIR SONIDOS: POR EJEMPLOCON UN SINTETIZADOR RELACIONA-DO CON LA CPU MEDIANTE UN IN-TERFACE; EN ESTE CASO, BASTA-RIAN LAS INSTRUCCIONES DE""OUT"" PARA SELECCIONAR LAS CA-RACTERISTICAS."
1 L$="ESTE ALTAVOZ ESTA CONTROLADOPOR UN CIRCUITO INTEGRADO: LAULA, CUYA MISION ES REALIZAREL INTERFACE ENTRE EL MICRO-PROCESADOR Y LOS PRINCIPALESPERIFERICOS (PANTALLA, GRABA-DORA, TECLADO)."
1 L$="EL SONIDO DEL SPECTRUM PRO-VIENE DE UN MINUSCULO ALTAVOZSITUADO EN LA ZONA INFERIORDERECHA DE SU PLACA DE CIRCUI-TOS."
1 L$="COMO SE PUEDE OBSERVAR EN ELDIAGRAMA DE BLOQUES, LA ULACONTROLA TANTO EL ALTAVOZ COMOLAS ENTRADAS MIC Y EAR; ESTOHACE POSIBLE LA AMPLIFICACIONDEL SONIDO: ":
1 L$="CADA NOTA SE DISTINGUE DECUALQUIER OTRA POR LA FRECUEN-CIA: LA NOTA MAS BAJA DELSPECTRUM ES UN ""DO"" CON UNAFRECUENCIA DE 8 HERCIOS, MIEN-TRAS LA NOTA MAS ALTA ES ""LA""DE 14160 HERCIOS (HERCIO = CI-CLO POR SEGUNDO)."
1 L$="BIEN "+N$+";":
1 L$="BASTA CONECTAR MEDIANTE UN CA-BLE LA TOMA EAR CON LA ENTRADADE UN AMPLIFICADOR (POR EJEM-PLO, LA ENTRADA ""AUX"" DEL STE-REO). PRUEBA A HA-CERLO ANTES DE VIDEOBREAK........YA VERAS QUE SONIDO !!!"
1 L$="A CONTINACION EL SINTETIZADORPRODUCIRA EL SONIDO, DEJANDOOPERATIVA LA CPU. EXISTEN IN-TERFACES SONOROS Y POLIFONICOSPARA EL SPECTRUM QUE APROVE-CHAN ESTA POSIBILIDAD. ALGUNOSHASTA ""HABLAN"""
1 L$=" ULA CPU":
1 INTENTAREMOS TRANSFORMAR ELSPECTRUM EN UN MINI ORGANOELECTRONICO: EN UN SPECTR...ARMONIUM !",""
1 INGELEK JAKSON
1 HAS REESCRITO UN PROGRAMA QUETE PERMITE UN USO EFICAZ DELA INSTRUCCION <BEEP> Y QUE,SI LO DESEAS, PUEDES MODIFICARY PERFECCIONAR HASTA TRANSFOR-MAR TU <SPECTRUM> EN UN MUSI-CO EXPERTO."
1 Fuerza pagina
1 FUNCION QUE RECONOCE LOS ATRI-BUTOS DE PANTALLA ATTR
1 ES POSIBLE INTERRUMPIR UN SO-NIDO CON <BREAK> ? NO
1 EL SONIDO LO GENERA LA ULA ? NO
1 EJERCICIOS
1 DEVUELVE UN CARACTER IMPRESOEN LA PANTALLA SCREEN$
1 CUAL ES LA UNIDAD DE MEDIDADE LA FRECUENCIA ? HERCIO
1 CUAL ES LA INSTRUCCION PARAGENERAR UN SONIDO ? BEEP
1 CUAL ES EL CIRCUITO USADO PARAGENERAR UN SONIDO OSCILADOR
1 COPE","ISO
1 CCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCCC
1 CC-AA,DD-BB,EE:
1 CAR TEST
1 CAR PROG
1 CAR NEXT
1 CAR LIST
1 CAR LENG
1 CAR HARD
1 CAR EJER.
1 CAR BREAK
1 CANTARAS","MES
1 CADA TECLA DE LA PRIMERA FILATIENE QUE PRODUCIR UN SONIDO,CORRESPONDIENTE AL NUMERO IN-DICADO SOBRE ELLA.
1 BURLADOR","NECIO
1 BREAK /
1 B$="------------"
1 AIR00000000000000000000High Score 000000 Score 000000GameOver
1 AHORA, COMO DE COSTUMBRE, IN-TENTA REESCRIBIR EL PROGRAMAEN BASE AL DIAGRAMA DE FLUJO.
1 ACUERDATE DE NUMERAR LAS LI-NEAS DE 10 EN 10 A PARTIR DE10."
1 AA,BB,CC,DD,EE:
1 A$="VIDEOTEST ":
1 A$="PON EN MARCHA LA GRABADORA"
1 A$=" SCREEN$-ATTR":
1 A$=" SCREEN$ - ATTR - BEEP":
1 A$=" BEEP":
1 A$=" ATTR":
1 A$(u+u)-48":
1 A$(u)-48":
1 A$","04C VUELVE ","#81;","2C60
1 ? (S/N)":
1 ;N$;" ? (S/N)"
1 ;"y quita la alimentacion a tu";
1 ;"ejemplos y ejercicios";
1 ;"Y ahora... VIDEO BREAK"
1 ;"Y PULSA <ENTER>":
1 ;"VIDEOBASIC"
1 ;"V A L O R E S"
1 ;"Ultima.. ",
1 ;"USA LAS DOS ULTIMAS FILAS","COMO EN UN PIANO.":
1 ;"UN MOMENTO...";
1 ;"TV TECL.";
1 ;"TU PUNTUACION ES ";s;" SOBRE 20."
1 ;"SPECTRUM. Hasta pronto,";
1 ;"PRUEBA AHORA"
1 ;"PREGUNTA N. ";w
1 ;"PARA MEJORAR, LEE DE NUEVO";
1 ;"Octava... ";(oct-127
1 ;"NO TE PUEDO AYUDAR":
1 ;"Muy bien, enhorabuena!"
1 ;"MUY BIEN ";n$;
1 ;"MIC EAR":
1 ;"La respuesta corecta es:";
1 ;"LA RESPUESTA ES MUY CORTA";
1 ;"HE AQUI UNA SUGERENCIA:"
1 ;"HASTA PRONTO":
1 ;"Guarda la cinta en su caja";
1 ;"Establece con <#>, <b>, <l>, <r> pulsa ENTER"
1 ;"ESTA BIEN ESCRITO";
1 ;"ESCRIBE TU NOMBRE";
1 ;"ES EXACTO."
1 ;"EN ESTE NUMERO EL HARWARE SEOCUPA DE LA PRODUCCIN DE SONIDOSCON EL ORDENADOR.";
1 ;"EN EL TECLADO";
1 ;"Cuando yo te hable, contesta co-mo es debido ":
1 ;"COMANDOS";
1 ;"BEPATRSCIN"
1 ;"BEEP .4,";i+oct-
1 ;"-- PON EN MARCHA LA GRABADORA --":
1 ;"- - - - - -"''':
1 ;"""";i$;""" esta equivocado."
1 ;" <- / ent ";
1 ;" (7/6)",
1 ;" TONO ";
1 ;" TEMPO "
1 ;" SIGUIENTE"
1 ;" Pulsa ""SPACE"" para continuar "
1 ;" BIEN "''" PARA LA GRABADORA ":
1 ;" ";(oct-127
1 ;" PON EN MARCHA LA GRABADORA "
1 ;" PARA LA GRABADORA ":
1 ;" PARA LA GRABADORA ":
1 ;" Composicion. 1"''" Nueva musica 2"''" Ejecuta..... 4"''" Fin ....... 9"
1 ;" PARA LA GRABADORA ":
1 ;" PARA LA GRABADORA "
1 ;" estoy cargando "''" VIDEOHARDWARE ":
1 ;" ";
1 ;" "
1 ;" ";
1 ;" ";
1 ;" ":
1 ;" ":
1 5TRADUCCION
1 43 - FASE DE OUTPUT","CUAL ES EL RESULTADO FINAL ?",""
1 4 O U T P U T "
1 2rs2rs2`a2LM2L
1 2fg2VW2`V2
1 2@A2fgdfg2rsdLM2VW2
1 23688/2-U"
1 23688+x)>31"
1 22 - FASE DE CALCULO","COMO OBTENDREMOS EL RESULTADO?",""
1 2,-2","TOCA SIb PROXIMO AL","<DO CENTRAL> DURANTE DOS","SEGUNDOS",""
1 2 ELABORACION "
1 11 - FASE DE INPUT","CUALES SON LOS ELEMENTOS NECE-SARIOS PARA NUESTRO PROBLEMA ?",""
1 10","04=A$ 0..9 ","<81;","01>NO","2=40
1 1 I N P U T ","043INT.<D> ","#810","2310
1 000000000000000000000000000000000000000000000000000000000000000000000000001111111111111021100000000000000211111111111112211000000000000002222222222222222110000000000000022222222222222221100000000000000000000000000000000000000666666666600000000066000000000006660088888888888888888880666660000000888===============8000000088888888?===============8888888888888888?<<<<<<<<<<<<<<<8888888888888888?;;;;;;;;;;;;;;;8888888888888888?;;;;;;;;;;;;;;;8888888888888888?:::::::::::::::8888888888888888?:::::::::::::::8888888888???888888888888888888:8888888888???8888????88?????::::8888888888???????889999999999:::888888888?88888888888888889999998888888888888888888888888888888888888888????????????????????????????????88888888888888888888888888888888888888888888888888888888888888888
1 ...................................
1 ."''"En caso de error teclea GOTO3000 y se efectuara de nuevola grabacion"'"":
1 -J/A,ER+J/A*.7
1 ,p;m$(dur1,cnt,5
1 ,p;m$(dur1,cnt,3
1 ,i+oct-128
1 ,XX;" ":
1 ,O;"PARTE SIGUIENTE";
1 ,A;" ";
1 ,A;" ":
1 ,,( &&&&&&&&&&'!!!
1 ,,( &&&&&,,,........(
1 ,,"Modifica a tu tu gusto..."
1 +" "
1 **AYUDA II INTENTO**
1 ***respuesta flash***
1 ***puntuacion***
1 ***pulsa una tecla***
1 ***comentario final***
1 ***bloque principal***
1 ***INPUT controlado***
1 ***CLS BAJO***
1 ***********************
1 * Un numero entre <0> y <9>que corresponde al tono de lanota",""
1 * Duracion de la nota (D)
1 ));q$(q,65
1 ));" PON EN MARCHA LA GRABADORA ":
1 (i/10)*10";:
1 (21,0)","IMPRIME EL CARACTER CONTENI-","DO EN LA ESQUINA INFERIOR IZ-","QUIERDA DE LA PANTALLA.",""
1 (0,31)="" ""
1 (/( &&&&&&&'........,
1 ((((((.22.(((((/////(((((,""""",***(((:88:(((((/////((/((,""""",***///:88:.+.+./////......,"
1 (";A;",";B;");",
1 ''';"vas usar
1 ''''''" PON EN MARCHA LA GRABADORA ":
1 '''''"Como habras podido deducir al irjugando, este programa usa tusrespuestas para ampliar su ""re-pertorio zoologico""; pero todaslas informaciones adquiridas setienen que ir guardando."'"Por lo tanto, si deseas que eljuego sea cada vez mas completocoge";
1 '''"Ya esta...pensabas en "
1 ''"ESCRIBE TU NOMBRE EN EL TECLADO."'"(NO MAS DE 15 LETRAS)"''''N$:
1 ''"Ahora vuelve a coger VIDEO BASICy.... ...pon en marcha la gra-badora"'''''''"Adios y hasta pronto..."
1 '"Ya he pensado bastante":
1 '"Que animal es ? ":
1 '"Hazme una pregunta que me permi-ta distinguir "'
1 '"Cual es la contestacion para "
1 '" --- M U S I C ---- "
1 $$~~$$~~$$
1 "xg+xs/2",yg+ys*
1 "vive en el mar ",
1 "un gato","un atun","un cocodrillo","una lagartija"
1 "i/10+3";i-
1 "es un mamifero ",
1 "es feroz ",
1 "________________________________"
1 "Ve a la nota.. ";
1 "VEAMOS AHORA ALGUN EJEMPLOPRACTICO SOBRE LAS FUNCIONESDE LECTURA DE PANTALLA, Y LAINSTRUCCION <BEEP>.",""
1 "RESPUESTA = ";
1 "Quieres volver a jugar ? [s/n] ":
1 "Piensa en un animal y"''"pulsa una tecla."
1 "OBSERVA LOS SIGNOS DE PUNTUA-CION Y LOS MENSAJES DE<INPUT>.",""
1 "Necesitaremos:
1 "LET A$=SCREEN$ (1.8,6.1)","TAMBIEN <SCREEN$>, COMO TANTASOTRAS INSTRUCCIONES, REQUIEREVALORES ENTEROS <1.8> Y <6.1>SERAN REDONDEADOS AUTOMATICA-MENTE A <2> Y <6>.",""
1 "LA SALIDA esta constituida porel sonido de una nota com-prendida entre el <DO> y el<SIb>, con la duracion elegidapor el usuario.","",""
1 "IF SCREEN$ (N-5,LEN X) ...","COMO SIEMPRE, LOS PARAMETROSSE PUEDEN PROPORCIONAR ADEMASDE EN FORMA DIRECTA, BAJO FOR-MA DE EXPRESIONES.",""
1 "IF ATTR (A,N)=56 THEN...","NORMALMENTE LOS VIDEOJUEGOSUSAN LOS MISMOS ATRIBUTOS PA-RA LOS OBSTACULOS, DE FORMAQUE SE PUEDA COMPROBAR FACIL-MENTE SU PRESENCIA MEDIANTE<ATTR>.",""
1 "IF ATTR (7,9)>=128 THEN..","LA PRESENCIA DEL ATRIBUTO<FLASH>, AL TENER COMO VALOR<128>, SE PUEDE COMPROBAR CONTODA FACILIDAD.",""
1 "Estoy seguro que tu animal esmuy interesante, pero ahora notengo sitio para el":
1 "Estas seguro ? (s/n) ";
1 "Es pronto para
1 "Elige ... ";
1 "El calculo consiste en elegirla funcion a ejecutar en basea lo que se haya indicado.",""
1 "BIEN, "+N$+"
1 "BIEN "+N$+"
1 "BIEN !!! Me la has jugado !"
1 "BEEP 1,0","ESTA INSTRUCCION HACE QUE ELSPECTRUM EMITA UN <DO CENTRAL>CON DURACION DE UN SEGUNDO.",""
1 "BEEP -2,5","ERROR ! UNA DURACION NEGATI-VA NO TIENE SENTIDO Y PROVOCAUN ERROR DE <INTEGER OUT OFRANGE>.",""
1 "Asi esta mal !":
1 "AHORA, "+N$,"TRASFORMAREMOS EL ANALISIS,PRIMERO EN UN DIAGRAMA DE FLU-JO, Y DESPUES DIRECTAMENTE ENINSTRUCCIONES <BASIC>."
1 "AHORA, "+N$,"
1 "? "'"[S/N]"'
1 "743//68/://;9////1//5/2/0"(
1 "7";" ESTOY CARGANDO VIDEOTEST":
1 "6";"PULSA";
1 "6";" SIGUIENTE"
1 "4";"ESTA BIEN ESCRITO ? (S/N)"
1 "30";i$(u+u)
1 "30";"0700"(I):
1 "3";"TECLADO Y PULSA <ENTER>":
1 "3";"ESCRIBE TU NOMBRE EN EL";
1 "3";"ESCRIBE TU NOMBRE EN EL TECLADO Y PULSA <ENTER>"
1 "25";" ~| ";
1 "25";" \] "
1 "25","125","-24","-10","3","-6","-6","6","3","20","3","6","-6","-6","3","-10","10","53","-1","1","-1","1","-1","1","6","-1","-1","-1","-1","-1","-1","50","40","25","-50","-25","10","0","-10","25","23"
1 "23617",u:
1 "23617",U:
1 "232FLASH 128","433BRIGHT 64","634 32","734","834PAPER 16","934",":34 8","<35 4","=35",">35INK 2","?35","@35 1"
1 "23295+I",
1 "22";i$(u);
1 "17",U;"^";
1 "165-y*8":
1 "127-XL/2",
1 "126-XL/2",
1 "12.3...4.......5...............6"(
1 "10-a/2",U;
1 "10";"VIDEOBASIC":
1 "10";"OTRA VEZ !":
1 "10";"ERROR !";
1 "10",U;"^":
1 "1","1","1","1","1","1","1","1","1","1","1","1","1","1","1","1","1","-5","43","5","1","-1","1","-1","1","-1","1","-1","1","-1","1","-1","1","-1","1","-1","1","25","25","-50","-25","25","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","-1","5","-43","-5","-1","1","-1","1","-1","1","-1","1","-1","1","-1","1","-1","1","-1"
1 "1","-1","-23","-25","20","-64","20","10","13","-20","-13","10"
1 "04@SUENA ! ","#81;","2@50
1 "04:TECLA<D>","<81C","0=9SI","2:30
1 "0321","0343","0412","0434","1421","1512","1534","2521","2543","2612","2634","3621"
1 "-6","64","10","-29","10","20","13","-42","-13","22","-10","18"
1 "-14","-1","-1","-1","-1","-1","-1","6","1","-1","1","-1","1","-1"
1 "-1","-1","-1","-1","-1","-1","6","1","-1","1","-1","1","-1"
1 ","SI LA ESQUINA SUPERIOR DERE-","CHA DE LA PANTALLA NO CON-","TIENE NADA ENTONCES...",""
1 ","SI LA ESQUINA SUPERIOR IZ-","QUIERDO DE LA PANTALLA PAR-","PADEA. ENTONCES....",""
1 "*1 ","% "
1 "'" Mod. (q)","
1 "'" Fin (e)"'" Canc. (d) ","1 2 3 4 5"
1 ""D="";D","046INT.<A$>","#81;","2620
1 "",(*(///::::,,,,,,(((........,
1 """"""""""""""""""""""""""""""""
1 " una cinta vacia, y pulsa""S"" para grabar el programa."'"Si no deseas guardar el programapulsa ""L""."
1 " Ve a: (g)"'" Inser.(i)"'" Repite(a)","o
1 " pon en marcha la grabadora.":
1 " EL SPECTR.... "," ....ARMONIUM"
1 z| x| c| v| b| n| m
1 l \
1 VUELTA AL PRINCIPIO";
1 Tel.031-240.959
1 SOFTIDEA - (Como)
1 REPETIR";
1 INTRODUCCION";
1 EJERCICIOS";
1 EJERCICIO"
1 COPYRIGHT 1985
1 CARGAR EL VIDEOJUEGO";
1 CARGA LA";
1 AL BASIC ":
1 ** ** ** ***********************
1 ** ** ** **
1 * * * ***********************
1 &&&&&&&&&&&&&&&&&&&&&&&&&&&&&&&TTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTTVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVVQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQQNNNNMMMMMMMMMMMMMMMMOMMMMOMMMMMNNNNNKKKKKKKKKKKKKKKKOKKKKOKKKKMNOOOOOOOOOOOOOOOOOOOOOOOOOOOOOOKN8888888888888888888888888888888888888888888888888888888888888888GGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGGG
1 Pon en marcha la grabadora
1 **
1 ":
1 *********************** ** ** **
1 ***********************
1 *********************** * * *
1 vive en el mar es feroz vive con hombres es carnivoro un cocodrillo una lagartija un gato come hierba un atun tiburon perro da leche caballo vaca l l
1
1
1
1
1